home *** CD-ROM | disk | FTP | other *** search
/ The Big Mouth 18 / Big_Mouth_The_18_1998_-_Side_B.d64 / cybernoid2 music (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  305b  |  10 lines
  1. 0 rem cybernoid 2 music hack
  2. 1 fori=49152 to 49190:read a$
  3. 2 l=asc(left$(a$,1)):l=l-55:if l<5 then l=l+7
  4. 3 r=asc(right$(a$,1)):r=r-55:if r<5 then r=r+7
  5. 4 v=(l*16)+r:poke i,v:next
  6. 5 sys 49152
  7. 10 data 78,a9,0f,8d,18,d4,a9,17,8d,14,03,a9,c0,8d,15,03
  8. 11 data 58,a9,48,8d,b5,dc,60,a9,35,85,01,20,26,a6,a9,37
  9. 12 data 85,01,a9,3b,4c,31,ea
  10.